(list-colors-display): Use with-help-window instead of with-output-to-temp-buffer.

diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index 26a0231bf1ab522501c26813ba808e7788005fbd..968a115c5d19e824f6ec1829c1bf8378daa9031f 100644 (file)
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -516,7 +516,7 @@ argument BUFFER-NAME is nil, it defaults to *Colors*."
       (let ((lc (nthcdr (1- (display-color-cells)) list)))
        (if lc
            (setcdr lc nil)))))
-  (with-output-to-temp-buffer (or buffer-name "*Colors*")
+  (with-help-window (or buffer-name "*Colors*")
     (save-excursion
       (set-buffer standard-output)
       (setq truncate-lines t)